﻿Public Class clsControls
    Public Property writer As System.Web.UI.HtmlTextWriter

    Public Class ToolBar
        Property tb As FineUI.Toolbar

        Sub New()
            MyBase.New()
            tb = New FineUI.Toolbar
        End Sub

        Sub Render(writer As System.Web.UI.HtmlTextWriter)
            tb.RenderControl(writer)
            'Dim pB As New clsPB
            'pB.AddProperty("ID", ID)
            'pB.AddProperty("runat", RunAt)
            'pB.AddProperty("Position", Position.ToString)
            'Dim sb As New StringBuilder
            'sb.Append("<ext:Toolbar ")
            'sb.Append(pB.Render)
            'sb.Append(">")
            'sb.Append("</ext:Toolbar>")
            'Return sb.ToString
        End Sub
    End Class

End Class